
.
A=-24576;B=-23260;for N=Ato B;%(N)=KP;next N;%(20050)=B;:return ;goto 100
{1}null .{-75}{-53}{-43}{-104}{-53}{-75}{-43}{-116}{-75}{-53}{-43}{-116}{-75}{-48}{-21}{-104}{-75}{-48}{1}{-116}{-75}{-48}{-21}{-116}{-43}{-8}Y{-104}{-43}Y{-8}{-116}{-43}{-8}Y{-116}{-104}{-91}Y{-120}{-128}{-128}{-128}{-124}{-128}{-128}{-128}{-120}{-128}{-128}{-128}{-124}{-104}!{-48}{-120}{-128}{-128}{-128}{-124}{-128}{-128}{-128}{-120}{-128}{-128}{-128}{-124}{-8}for {-128}{-124}{-128}{-128}{-128}{-124}{-68}{-128}{-128}{-127}{-75}{-128}{-128}{-127}{-68}{-48}{-27}{-124}{-65}{-128}{-128}{-124}{-57}{-128}{-128}{-124}{-65}{-48}{-38}{-124}{-128}{-128}{-128}{-124}{-68}{-128}{-128}{-124}{-75}{-65}{-48}{-124}{-128}{-128}{-128}{-124}!{-128}{-128}{-124}{-8}{-128}{-128}{-124}{-128}{-128}{-128}{-124}{-68}{-128}{-128}{-127}{-75}{-128}{-128}{-127}{-68}{-48}{-27}{-124}{-65}{-128}{-128}{-124}{-57}{-128}{-128}{-124}{-65}{-48}{-38}{-124}{-128}{-128}{-128}{-124}{-68}{-128}{-128}{-124}{-75}{-65}{-48}{-124}{-128}{-128}{-128}{-124}!{-128}{-128}{-124}{-8}{-128}{-128}{-124}{-128}{-128}{-128}{-124}{-78}{-68}{-128}{-124}{-89}{-65}{-21}{-120}{-84}{-65}{-21}{-124}{-78}{-68}{-8}{-124}{-128}{-128}{-128}{-124}{-89}{-78}{-128}{-124}{-95}{-75}{-38}{-120}{-91}{-75}{-38}{-124}{-89}{-78}{-27}{-124}{-128}{-128}{-128}{-124}{-95}{-89}{-128}{-124}{-102}{-86}{-57}{-120}{-99}{-86}{-57}{-124}{-97}{-89}{-48}{-124}{-91}{-128}{-128}{-124}{-89}{-128}{-128}{-124}{-84}{-128}{-128}{-124}{-78}{-128}{-128}{-124}{-75}{-128}{-128}{-124}{-8}for {-128}{-124}{-128}{-128}{-128}{-124}{-68}{-128}{-128}{-127}{-75}{-128}{-128}{-127}{-68}{-48}{-27}{-124}{-65}{-128}{-128}{-124}{-57}{-128}{-128}{-124}{-65}{-48}{-38}{-124}{-128}{-128}{-128}{-124}{-68}{-128}{-128}{-124}{-75}{-65}{-48}{-124}{-128}{-128}{-128}{-124}!{-128}{-128}{-124}{-8}{-128}{-128}{-124}{-128}{-128}{-128}{-124}{-68}{-128}{-128}{-124}{-89}{-68}{-48}{-124}{-89}{-65}{-128}{-124}{-89}{-57}{-128}{-124}{-89}{-65}{-48}{-124}{-89}{-128}{-128}{-124}{-89}{-68}{-128}{-124}{-84}{-75}{-48}{-124}{-84}{-128}{-128}{-124}{-84}{-65}{-128}{-124}{-78}{-68}{-48}{-124}{-128}{-128}{-128}{-124}{-89}{-78}{-128}{-124}{-95}{-75}{-61}{-120}{-91}{-75}{-61}{-124}{-89}{-78}{-61}{-124}{-84}{-128}{-128}{-124}{-78}{-128}{-128}{-124}{-71}{-53}{-38}{-124}{-84}{-128}{-128}{-124}{-91}{-128}{-128}{-125}{-68}{-48}{-27}{-124}{-65}{-128}{-128}{-124}{-68}{-128}{-128}{-124}{-75}{-65}{-38}{-124}{-128}{-128}{-128}{-124}{-78}{-65}{-38}{-124}{-75}{-38}{-65}{-116}{-68}{-27}{-8}{-124}{-128}{-128}{-128}{-124}{-128}{-128}{-128}{-124}{-109}{-102}{-89}{-124}{-128}{-128}{-128}{-124}{-89}{-128}{-128}{-127}{-93}{-128}{-128}{-127}{-89}{-75}{-65}{-124}{-86}{-75}{-65}{-124}{-89}{-75}{-65}{-124}{-97}{-78}{-68}{-124}{-128}{-78}{-68}{-124}{-93}{-78}{-68}{-124}{-89}{-68}{-57}{-124}{-128}{-68}{-57}{-124}{-86}{-68}{-57}{-124}{-109}{-102}{-89}{-124}{-128}{-128}{-128}{-124}{-89}{-128}{-128}{-127}{-93}{-128}{-128}{-127}{-89}{-75}{-65}{-124}{-86}{-75}{-65}{-124}{-89}{-75}{-65}{-124}{-97}{-78}{-68}{-124}{-128}{-78}{-68}{-124}{-93}{-78}{-68}{-124}{-89}{-68}{-57}{-124}{-128}{-68}{-57}{-124}{-86}{-68}{-57}{-124}{-109}{-102}{-89}{-124}{-128}{-128}{-128}{-124}{-89}{-128}{-128}{-124}{-91}{-78}{-68}{-122}{-95}{-78}{-68}{-126}{-99}{-78}{-68}{-124}{-102}{-75}{-65}{-124}{-128}{-128}{-128}{-124}{-89}{-128}{-128}{-124}{-91}{-78}{-68}{-122}{-95}{-78}{-68}{-126}{-99}{-78}{-68}{-124}{-102}{-75}{-65}{-124}{-128}{-75}{-65}{-124}{-89}{-75}{-65}{-127}{-93}{-128}{-128}{-127}{-89}{-68}{-48}{-124}{-84}{-68}{-48}{-124}{-78}{-68}{-48}{-124}{-84}{-68}{-57}{-124}{-89}{-68}{-57}{-124}{-84}{-68}{-57}{-124}{-78}{-65}{-38}{-124}{-128}{-65}{-38}{-124}{-75}{-65}{-38}{-125}{-68}{-48}{-27}{-124}{-99}{-128}{-128}{-124}{-97}{-128}{-128}{-124}{-95}{-128}{-128}{-124}{-93}{-128}{-128}{-124}{-91}{-128}{-128}{-124}{-89}{-38}{-21}{-124}{-48}{-38}{-21}{-124}{-53}{-128}{-128}{-124}{-57}{-128}{-128}{-124}{-61}{-128}{-128}{-124}{-65}{-128}{-128}{-124}{-68}{-27}{-8}{-124}{-128}{-128}{-128}{-124}{-128}{-128}{-128}{-124}{-128}{-128}{-128}{-120}{-128}{-128}{-128}{-124}{-109}{-89}!{-124}{-128}{-128}{-128}{-124}{-128}{-128}{-128}{-124}{-128}{-128}{-128}{-120}{-128}{-128}{-128}{-124}{-114}{-99}{-8}{-124}01234567890123456789012345678901234567890123456789012345678901234567
a null clear ;BC=rnd ((3)-1)+rnd (32)mul 8;FC=BC+4+rnd (32)mul 8
goto null L=2;T=1;&(20)=129;A=-24574;E=-24505;NT=0;F=138;CY=10;print "    FUNERAL MARCH OF A";print "        MARIONETTE
gosub null print ;print "      CHARLES GOUNOD
{120}null &(16)=49;&(21)=10;&(22)=136;for B=132to F;for C=Ato E-2step 4
{-126}null for D=1to (%(C+3)div 256+127)div Lmul T;&(17)=%(C)div 256+127;&(18)=%(C+1)div 256+127;&(19)=%(C+2)div 256+127;next D;next C
{-125}null goto B
{-124}null &(20)=0;A=-24506;E=-24173;next B
{-123}null A=-24174;E=-23929;next B
{-122}null A=-24318;E=-24173;next B
{-121}null A=-24174;E=-23929;next B
{-120}null A=-24318;E=-24173;next B
{-119}null A=-23930;E=-23837;next B
{-118}null &(17)=0;&(18)=0;&(19)=0;&(20)=0;clear ;:input 
null {-1}null null 0